Cargadores para Feuj Radx-8, Morfionoiés, JHngBouiKesBaá, 
Ale-Hop, Jemptations f~ 



PROGRAMAS 



Intefert *5S 



Othek,Sokggktto, 



JENTREVISTALL 
ANTONIO PASCUAL) 

director de FffBF en CofoA//7/a ¡ 



iJOYSTICK AL DIA 

I JIn nuevo apartado 
~ m dedicado a trvcos 



BIENVENIDOS A msxclub 

UN SOFTWARE de alta calidad para msx 







LORD, a. 








ü|HÍ| 
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" Ñombrí Apellidos 

Dirección 
Población 

□ KRVFTON Pías. 500.- 

□ LORDWATSON ' 

□ EL SECRETO DE LA PIRAMIDE Pías. 70oi- 


CP Prov. Tel.: 

Q STAR RUNNER Pías. 1.000,- □ MAD FOX Pías. 1.000,- 

□ TEST DE LISTADOS Pías. 500,- □ VAMPIRO Pías. 800,- 

□ HARD COPV Pías. 1500- □ SKV HAWK Pías. 1.000- 

□ MATA MARCIANOS Pías. 900- □ TNT Ptas. 1.000- 
C DEVIL'SCASTLE Pías. 900- □ QUINIELAS Pías. 1.000,- 
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Editorial — 

UNA PUBLICACION 
PROGRESIVA 




MICROS MSX, y 
caliente ta cabeza de una vez por todas. EI1< 
significará que cuando se refresquen la 
mente se darán cuenta de que su logotipo c 
MSX sobra. A ver si se apartan del caminí 
y dejan que otros hagamos un buen 

Por un futuro Heno de MSX... 

j TRANSFER, S. 



Sumario. 



año IV-N.o 42 -Junio, 1988 
Sale el día 1 de cada mes 

P.V.P. 275 Ptas. (Inc. IVA y sobretasa aérea Canaria! 



MONITOR AL DIA 

Todas las novedades en so 
para MSX. 

LINEA DIRECTA 

Respondemos a las consult; 



Dos inserciones gi 
para comprar, vender i 
cambiar hard y soft o 

ENTREVISTA A. 

Nueva sección de 
En esta ocasión entrevista- 
mos a Antonio Pascual (direc- 
tor de ERBE en Cataluña). 

A EL BASIC 
PASO A PASO 

v Música y sonido en BASIC 





LA ABADIA DEL CRI- 
MEN 

' ¿Cómo concluir el juego? 

1 / MODEMS 

\<X Un artículo especial dedicado 



bancos de d 



O/JOYSTICKEN MANO 

jQ Otro nuevo apartado en el 
^ que se publican los trucos de 
los lectores. En esta primera 
ocasión especialmente prepa- 
rado para los videojuegos. 

2Q VIDEO-POKES 

yk Pokes y cargadores para Feud, 
J Radx-8, Martianoids, Thing 
Bounces Back, Ale-Hop, 



msxclub 



Tel. (91) 315 09 42. Fotocomposición y Fotomecánica; JORVIC 
Todo el material editado es propiedad exclusiva de MANHATTAN TRANSFER, S. A. 



CARTA DE UN LECTOR 

DIRIGIDA A 
NUESTRA DIRECTORA 



mercado de juegos MSX, y supongo qt 
relación comercial con ellos. 

Mi problema es que me dejé llevar por la publicidad, un tanro engañosa bien 
es cierto, de esa firma y les compré a través del correo un MULTIMILLER por 
valor de 7.950 ptas., que ellos mismos afirmaban eliminaba los problemas de 
incompatibilidad existentes entre los MSX-1 y los MSX-2, dado que poseo un 
ordenador Phillips de la segunda generación y tengo problemas de carga de 
programas. Me fue enviado pero no solucionaba mi deficiencia, por lo cual pedí 
explicaciones y me respondieron que su Multimiller no era adecuado para los 
ordenadores como el mío, y me recomendaron la compra de una expansión de 
memoria con una ampliación de 256K de RAM, juntamente con un programa 
denominado CHANGE-RAM. Y que una vez adquiridos estos artículos no 
tendría ningún tipo de problema ya que la compatibilidad era total, por lo cual 
les envié una carta solicitándoles tales elementos. Pero éste fue el principio de 
mi calvario. 

Después de una y mil excusas, alguna llamada telefónica que otra, y sobre 
todo una gran dosis de diplomacia, me han estado dando exusas y negándose 
a enviarme mi dinero (ya que igualmente les devolví el MULTIMILLER que 
a mí no me servía), ni los artículos solicitados después. Ha habido desde entonces 
toda una serie de cartas, sin respuesta, hasta que en la última les pedía el dinero 
adeudado, los accesorios o en caso de existir una explicación existente a todo 
lo que estaba pasando. Esto fue hace quince días y como ya se habrá imaginado 



o uds., afirman en su revista es necesario lu 



es lícito defender los derechos de los us 
ante la omnipotencia de las casas de software, que pueden a su et 
y capricho manipular las ventas o engañar sin menoscabo de su acc' ' 

Sin otro particular aprovecho la ocasión para agradecer muy at 
ayuda y cooperación en la resolución de mi problema. Re " 
de éste su seguro lector, de ambas revistas. 

Antonio Tenes Gil 
C/Serrano, 75 
28006 - MADRID 



ENTREVISTA A... — ^ 

ANTONIO 

DliCnillTit rexror de ERBE en Cataluña, hemos 

r Abl U AL* zuzzsr de 10 que acmal - 



mantenida con Antonio Pascual, di- 




.. N.>, 1 



es la Mejor Compañía de 
imas aparte, MCM es un; 

» ERBE 



mercado, dado que las compañías compe 

sabido y podido. Por tanto ERBE considen 
oportuno c 




'.: — ELITE; todos los productos de la 
npañía TELECOM: RAINBIRD, 
UN, FIREBIRD, etc.; OPERA SOFT; y 



de otdenadores, incluido AMIGA, PC 
8256 AMSTRAD. 
C: —¿Qué novedades hay pendien 



hablando de novedades es que, la 
«nía DINAMIC ya no la distribuye 
ERBE. O sea DINAMIC, a partir de este 
deja de ser una anexa de ERBE. 

.s españolas, como TOPO SOFT. 
—¿Quieres añadir alguna cosa 



determinadas carátulas, al presidente de 
una compañía, o incluso al distribuidor del 
producto final, implicará que nos acerque- 
mos al pensamieno del personaje, y lo que 



artado que pretende agradar al lector. 
Para comenzar hemos seleccionado a 
la personalidad de una de las compañías 



ca de los nuevos cambios fu 
s importante de la conve: 



CENTER (delegación 



El basic paso a paso ■ 



.Por Willy Miragall. 



MUSICA EN 
BASIC (III) 



UNA PARTITURA 



D 



intentarlo ahora, sin seguir leyendo el ar- 
tículo. Cuando terminéis podéis leer y com- 
parar el resultado que proponemos con el 



tagrama. La clave de sol, conocido símbolo 
que encabeza muchas partituras, nos indica 
que la segunda línea <" ' 



ía.LosMSX, por sí solos, 



hablaremos dentro de pocos capírulos. 

Habremos de especificarle también a 
ordenador ciertos datos que, por lo general 



fifsn | j j a fe 




¡Égl 




lugar hemos indicado el tipo de forma de 



onda con SI. Gracias a 



prete la melodía. Para saber qué número 
equivale a qué sonido os remitimos a 1 
tabla que apareció publicada en nuest 
pasado número. 

El siguiente paso es programar la loi 
girud de la forma de onda, con el paráme- 
tro M. Observaréis que en nuestra tran 
cripción hemos utilizado M9000. ( 
preguntaréis de dónde sale el valor 900 
Existen métodos de análisis del sonido qi 
r el valor más ade- 



cuado a cada nota (M debería modifi 

ren^rÍL n Sta S C Sid\d U en d son 
embargo, como método práctico 
os recomendamos fijar de oído 




respondientes a los 8 primeros compa- 

d -día correspondiente a los 16 primeros 
.mpases será entonces A$+A$, ¿fácil 
3?. Gracias a esto la repetición de zonas 
en la melodía dejará de ser un problema. 







LISTADO 


B4 B4 B 05 C D C CB 04 B A G8 G 
B G A B A G4. RB" 


:í0 ' TRANSCRIPCION A UNA SOLA VO 

40 PLAY "si m9000 ti 00 04 L16 GB 
G A G8 F+8 B4 B4 G8 G A G8 BB D 
5 E4 E4 ES E F ES EB E8 A8 E4 04 

B A G A BB 05 D+8 E4 E4" 
50 PLAY "04 GB G A G8 F+8 B4 B4 
G8 G A GB B8 05 E4 E4 E8 E F E8 
E8 ES AB E4 04 B A 6 A BB 05 D+8 
E4 E4" 

60 PLAY "04 B4 B4 B 05 C D C C8 
04 B8 A8 A8 BAGA A4 B4 05 G4 


LISTADO 


10 ' 

20 ' TRANSCRIPCION A UNA SOLA VO 
Z 

4 0 CLEAR 300 

50 PLAY "si m9000 ti 00 L16" 
60 A*="04 G8 6 A G8 F+8 B4 B4 G8 
G A GS BB 05 E4 E4 EB E F E8 EB 
E8 A8 E4 04 B A G A B8 05 D+8 E 
4 E4" 


64 F+ E D+ E E4 E8 DB D8 D C 04 
B4 05 D4" 

70 PLAY "04 B4 B4 B 05 C D C CB 
04 B8 A8 AB B A G A A4 B4 05 G4 
G4 F+ E D+ E E4 EB DB DB D C 04 
B4 05 D4" 

80 PLAY "04 B4 05 D+4 G8 G F+ EB 
D C 04 B4 05 D+4 G8 G F+ E8 D C 
04 B4 B4 B 05 C D C C8 04 B A G 

8 68 G A B A G4. RB" 

90 PLAY "B4 05 D+4 G8 G F+ EB D 

C 04 B4 05 D+4 G8 G F+ E8 D C 04 


70 PLAY A*+A* 

80 A*="04 B4 B4 B 05 C. D C C8 04 
B8 A8 A8 BAGA A4 B4 05 G4 G4 
F+ E D+ E E4 E8 DB DB D C 04 B4 
05 D4" 

90 PLAY A*+A* 

100 PLAY "04" 

110 A*="B4 05 D+4 G8 G F+ E8 D C 

04 B4 05 D+4 GB G F+ E8 D C 04 
B4 B4 B 05 C D C CB 04 B A GB G3 



El basic paso a paso 




Podíamos haber 

PLAY T100 L8.+AÍ+.T200 
L16"+B$ 

En realidad ambos sistemas son bas- 



FOR 1=3 TO 7 
PLAY "0=1; L8 
NEXTI 



END OF PLAY 



comandos de PLAY. Esto no quiere 
I, ni mucho menos, que vayam 
ir PLAY ya que en nuestro próximo 



SOUNDy.gr; 
a trabajar con . 
MSX con mucha marcha. 



SUSCRIBETE 

Suscribiéndote no solo tienes la scgurnl.nl de tener iodos los meses tu 
MSX CLUB OH l'K( K IKAMAS ,n u, casa sino que rceihirás 12 
números pagando sólo 10 



BOLETIN DE SUSCRIPCION MSX CLUB DE PROGRAMAS 



Teléfon, 



p.igo adjuntando talón al port.idoi 



Importante: Colocar en el sobre: Departamento 



: números a la revista MSX CLUB 1)1- l'KtH ,K \ MAS a pan,, del numero 

al portador barrado a: C/. Roca i Batlle, 10-12 ■ 0S023 Barcelona 

normal Ptas. 2 750— 1 1 

aéreo Ptas 3.500- 
o aéreo USA$ 35USAS 

:¡ones MSX CLUB. NO Sli ADMITE CONTRA REEMBOLSO. | 
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9 REM 



POR 



50 REM 
60 REM ALEJANDRO ROMERO 
70 REM 

80 'CLSnKEY OFF 
3 LOCATE 5. 10:PRINT"E L 



- E C ' 



3 CLS 



l TO 750 



MEXT 



-NFUT" JUGADAS"; JU 
130 LEY OFF: CLS: LOCATE 10.10:PRI 

^5™NN-0 YUSCULAS " ! DIM A * <35> " BB 
140 LOCATE 2, 13: PRI NT "PULSE BARR 
A PARA NUMERO ALEATORIO" 
150 NU=INT(RND' !. ! *Z?2&0>. ) :LOCftTf- 
14. 15: PRI NT MU: : NU*- I NKEY* : BEEP 
: IF NU*OCHR*<32> THEN BOTO 150 
160 DATA A. l.A, l.A. LE."? C 3 D 2 
, E, 1,E, 1,E, 1,F.6,G.6,H,6. I. l \ 1\ 1 

170 FOR XX=1 TO 35:PEAD A*(XX).B 
B(XX) : NEXT XX 
180 CLS 

190 INPUT " JUOADORES" : JE 

20C FOR JU6-1 TO JG 

210 CLS: INPUT"DIME TU NOMBRE: "; 



230 CLS: NN=NN+1: LOCATE 15, liPRHM 

T" JUGADA ="NN 

240 FOR JU5=1 TO JG 

250 FOR JJ-1 TO 7 

260 HH» I NT • RND (NU)*3S>*Í 

271? PRI NT A* (HH) :••■=" : BB <HH5 t PRIN 

280 NEXT JJ 

290 LOCATE 20.5-.PRINT JG*(JUG):L 
OCATE 10. 10:PRINT"TU PALABRA ES 

300 INPUT PAL*: PRI NT: PRI NT 
•i PLAY "06L 1 6V i 3CDEFGFEDC " 
:¡ LN=LEN(PAL*> 
9 FOR V-l TO LN 
340 X»(V)-.MID*(PAL*. (V) . 1) 

IF X*(V)-"A"QR X*<V)^".E" OR 
V)="I" OR X*(V)="0" OR X*(V>= 



="S" THEN P(V)=2sP=P+2 
370 IF X*(V)="C" OR X*(V)="L" OR 
X*(V)="M" QR X*(V)="P" OR X*(V) 
="R" THEN P(V)=3:P=P+3 
3B0 IF X*CV)="G" OR X*<V)»"V" CR 
X*(V)="F" OR X*(V)«"J" OR X*(V) 
="H" THEN P'V)=6:P=P+6 
390 IF X*(V)="Q" OR X*(V)="X" OR 
X*(V)="Y" OR X*(V)="Z" THEN P(V 
)=9:P=P+9 
400 NEXT V 

410 IF LN=7 THEN P=P+50 

420 LOCATE B, 15: PRINT" SACAS" ; P; " 

c -UNTOS CON" :LN: "LETRAS" 

430 T(JU5)=T(JUG)+P: LOCATE B, 17: 

PR I NT " LLEVAS " : T ( JUG ) ; " PUNTOS " 

440 P=0:P(V)=0 

450 LOCATE 8 . 20 : PR I NT " S I ESTA BI 
EN PULSA BARRA" 

460 K*=INKEY*:IF K* ' ,-CHRS (32) TH 

EN GOTO 460 

470 CLS: NEXT JUG 

480 IF NN< (JU-2) THEN GOTO 230 

490 FOR JUG =1 TO JG 

500 PL A Y " 05V 1 3LBCEGBGECDD " 

510 PRINT JG*(JUG)¡", HAS OBTENI 

DO" ; T (JUG) ; "PUNTOS" 

520 NEXT JUG 

530 END 



Test de listado 




0 160 -211 

0 170 -131 310 

0 180 -159 320 

0 190 - 57 330" 

0 200 -211 340 



■226 430 - 

28 440 - 

■ 98 450 - 

108 460 - 

76 470 - 
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Programa 



■Por Nicolás Wadham Lasartei 




"R0J0":N1 
"BLANCO" 



AZUL" 



5 FOR I 



l Tü ; 



460 READ I4<K>,J4(K> 
470 NEXT 

480 FOR 1= 0 TO 9:F0< 
490 A(I, J)= 0 
500 NEXT J, I 



1 SC (1)' 



NI •-■ 



550 FOR NN= 1 TO 300: NEXT :.CLS 

560 GOSUB 2340 

570 IF NP= 2 THEN 1080 

580 FR I NT : F'R I NT : FR I NT D*" QUIER 

E EMPEZAR PRIMERO" " ; 

: GOSUB 2270: IF X*- "S"T 



RINT 1 



J3» 0:T1 = C:T2= H 
640 IF PT» 1 THEN } 
J3= 0sTl= H:T2- C 
650 GOTO 1090 



cotí:. 



580 



: IF PT> 2 THEN PT" 
:S» 0:J3- 0íTl- C:T2 
. TC /H:FOF. J= ,-,L T9 
' 0 THEN B50 



>) THEN SI' 



THEN 340 
) > .5 THEN 050 
- I:J3= J 



IF Bl 



¡ THEN 
) THEN 



80 IF NP = 1 THEN S5= 0:GOTO 670 

90 S5= 0:GOTC 610 

00 55- 01 PRINT D* E* D* "P IERPO 

II TURNO DE JUEGO'" 

10 IF Z= 1 THEN 1490 

30 GCTO 1080 



960 GOSUB 2 
970 1= 13: J 
980 GOSUB 1 
'90 SCCPT>= 
000 0P= PT 



F 0P= 3 THEN 0P= 



010 SC(OF!= 
120 Nl= NI* 1 

130 PRINT D*E*D*" CONSIGO 
140 PRINT SI: 

'50 PRINT " DE TUS FICHAS!" 
060 GOSUB 2430 

070 IF SC(OP)= 0 OR Nl= 64 THEN 



100 IF PT- 2 THEN Bl = 
J3- 0:T1= C:T2= H 
110 IF PT- 1 THEN Bl- ■ 
J3= 0:T1= H¡T2» C 



: 0)OR (j> s> 



Programa ■ 



1160 PRINT D*;E*D*;" PIERDES TU 

TUFNO DE JJEBÜ ? "s 
1170 GOSUB 2260: IF X* '. > "S"THEN 
PRINT "NO"; GOTO 1100 



' z= : 



THEN 1490 



1200 
1210 BOTO 610 

12213 IF A(I.J>= 0 THEN 1250 

1230 PRINT DfPOSICION GCUFADA; 

INTENTE OTRA " 

124»? ¿330 

1250 GOSUB 1900 

1260 IF Fi = 1 THEIM- 1290 

1270 PRINT D*""E*D*"NO ESTA J'JNT 

O A Um CONTRARIA 

128:}' 3CT3 1330 

1300 GOSUB 1840 

1310 IF Sl> 0 i"HÉN 13S0 

1220 PRINT DV"E«D*"NO FLANQUEA 

FICHAS CONTRARIAS 

133/1 PRINT E*D*:BEEP:FOR N«l TO 

:310 GOTO 1100 



CHA"; : IF Bl> 
NT E*D* 



[a-Q IF 3C(0P;-= 

1480 GOTO 610 
:<?■-•;;• CLS: PRINT 

!!!.<!? r-=-iM T " 

'SF(l)" FICHAS 
151!? PRINT Ft<2> 
■ I CHAS" 



I!!!' TIENE 

(2)" "TEME "3C'.2>" 

- 2C Í2) THEN ¿570 
! THEN 1600 
: SC <2) THEN 1590 
C SIENTO. HE GANADO 



! GOTC 1740 

» PRINT "HA GANADO ! 

f Cí~ 3CU>- SC(2) 



640 PRINT " HA SIDO UN": 
:Sjí: IF 21 11 THEN 1730 
660 IF Cl< 25 THE! 1720 
670 IF Cl< -39 THEN 1710 
68!? IF CK 53 THEN 1700 
690 PRINT '"A PARTIDA PERFECTA" : 
GOTO 1740 
700 PRINT " PASEO! ! " : GOTO 1740 
-10 PRINT "A LUCHA": GOTO 1740 
72:3 PRINT 1 A PARTIDA DUPA" . GOTO 
1740 

730 PRINT "A PESADILLA" 
740 PRINT 

750 PRINT "QUIERE JUGAR OTRA P 
ARTIDA ? " : : BEEP 

.760 GOSUB 2270: IF X*- "S"THEN P 
RINT » SI": :RUN 90 
770 PRINT "NO" 

780 PRINT "GRACIAS POR JUGAR. " 
790 END 

800 Fl= Z0:FOR I 1= - 1 TO ltFOR 

Jl= - 1 TO 1:IF AU+ I1.J1+ J) = 

T2 THEN 1820 

810 NEXT J 1 : I 1 : RETURN 

820 Fl= 1: RETURN 

830 REM COMPROBACION DE LA CUE 
NTA Y DEL FRANQUEAMIENTO DE LAS 
ICHAS 

840 Sl= Z0-.FOR K= 0 TO 7 

850 S3= 20:15= I4(K):J5= J4(K>: 

6= 1+ I5:J6= J + J5 

860 IF A(I6>J6>< > T2 THEN 1970 
'70 S3= S3+ 1:16= 16+ I5:J6= J6 



J5 

180 IF A(I6.J6)= TI THEN 1910 
190 IF A(I6,J6>= Z0 THEN 1970 
900 GOTO 1870 



10 Sl = 



S3 



920 IF U< > 1 THEN 1970 

930 16= I:J6= J 

940 POR Kl= 0 TO S3 

950 A(I6,J6)= T1:I6= 16+ I5:J6= 

J6+ J5 

960 NEXT Kl 

970 NEXT K 

980 RETURN 

990 REM REGISTRO DE LOS 3 SETS 
DE LOS MOVIMIENTOS DEL ORDENADO 
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2000 IF 1= YL THEN YL= YL- 
YL< i THEN YL= 1 
2010 IF 1= YH THEN YH» YH+ 
YH 8 THEN YH- 8 
2020 IF. J- XL THEN XL» XL- 
XL< 1 THEN XL= 1 
2030 IF ,J= XH THEN XH= XH+ 
Xü' 8 THEN XH= 8 
2040 LOCATE 1,1:PRINT TI*;" 



l RETI 
2060 REI»! 



SUBRUTINAS 
" D*E* "MOVI MIENTO NO VA 



2090 FOR K= 1 TG 2 
2100 C-OSUB 2270 
2110 5= ASC (X*) 
2120 IF 47< G AND B< 



II NT ' 



5B THEN ] 



i AND G< 74 THEN J= 
G- 64 SPRINT ""X*" "j 
2140 NEXT SPRINT : RETURN 
2t50 REM REFLEJOS DE LOS MOVIMIE 
NTOS DEL JUGADOR 

2160 L0CATE2* 13+2. 2* J3+3: PRINT»» 
2170 1= 13: J = J3 

21S0 GOSUB 2000sPL*="«":6GTO2230 

2190 IF PT- 2 THEN CC= 0 

2200 IF PT= 1 THEN CC= 2 

2210 LOCATE 2*1+2, 2*J+ 3sPRINT"D 

2220 GOSUB 20003 PL*= '"O" 

2230 FORNN— 1 TOS : LOCATE 2*1+2, 2»J 

+ 3:PRINT " ":FORNM=lTO50sNEXT 

2240 LOCATE 2*I+2,2*J+ 3sPRINTPL 

*sFORNM=lTO50sNEXT:NEXT 

2250 RETURN 

2260 REM 

2270 BEEP 

2230 X*=INKEY*sA=RNDU>:IF X*="" 

THEN2280ELSERETURN 
2290 REM PUNTOS 

2300 LOCATE 23.5sPRINT "0"RIGHT* 
(" "+STR*(SC(1> ) ,3)-; " " : LOCATE 
23. 19sPRINT'B";RIGHT* <" "+ ST 

R* <SC(2) > ,3) ; " "ssLOCATE 1,1 

2310 RETURN 

2320 REM DATAS DEL TABLERO 
2330 DATA 0.1,-1,1,-1.0.-1,-1,0, 
-1, 1,-1, 1,0, 1, 1 

2340 REM OTROS 5 TABLEROS DE OTH 
ELLO 

2350 CLSs LOCATE 5,1:PRINT "O T H 

ELLO" 
2360 LOCATE 4,3sPRINT"l 2 3 4 5 
6 7 8" 

2370 FOR N=l TO Bs LOCATE 1 . 5+2*N 



SHOP BOY 




VENTA EXCLUSIVA EN 
ESTABLECIMIENTOS MIRO 

(Si donde resides no hay una tienda Miró, 
puedes pedir el juego por correo: Estable- 
cimientos Miró, Vía Julia, 140-08016 
Barcelona.) 
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Software 




para confiscarle el pergam 
remedio que entregarlo. 

Llegando la hora de asi 
podrás observar cómo el abad deja el m 
nuscrito encima de su escritorio. 

Es la hora de regresar a la celda. 



Quinto día 

Esa noche no había que dormir, 
zando el camino nocturno (ver n 
llegaron hasta el altar donde dieroi 

habrás de retornar a la celda. Adzo pr 
tará para dormir; respóndele que sí. 
Como venía siendo habitual, asistid 

hasta ellos desvelándoles el descubrirr 
Cuando, más tarde, el abad llamóla 

bibliotecario, habiendo escuchado la 

celda. Queriendo poseer el libro, lo as 
y lo encerró en la habitación con su p 
llave. La cuestión se complicaba más. 

En el horario de la comida y al tér 
de ésta, el abad y Guillermo se enea. 



intonces, que le quedó tiempo para 
el libro y regresar a la iglesia, pér- 
o los lentes y una llave. En la capilla, 
pronunció 




as para sospechar en la 



Esa noche, dirigiéndose hacia el laberin- 
o tropezaron, en la entrada del mismo, 
on la llave perdida por el bibliotecario, y 
n el torreón noroeste del laberinto, las 
mtes de Guillermo. Ver mapa. Tener en 
onsideración, por otro modo que, si se está 



«FINIS AFRICAE, SECRETUM MA- 
NUS SUPRA DIXI IDOLUM AGE PRJ. 
MUM ET SEPTIMUM DE QUA- 
TUOR». 




Guillermo, vio a Jorge, el anciano c 
invitándole a leer el libro. Como Jorge 
padecía de La vista no se percató de que, 
previamente, Guillermo se había colocado 
los guanres. Era un libro irónico de Aris- 
tóteles, un libro prohibido. Guillermo le 
comprendió todo. Las páginas de éste es- 
taban impregnadas de veneno y cuando 
alguien se humedecía el pulgar para pasar 
las páginas (el libro era bastante viejo), al 
llevarse los dedos a la lengua, morían en- 
venenados. Jorge, se dio cuenta ahora de 
que su invitado se había puesto unos guan- 
tes. Salió disparado de la estancia y enton- 
ces, por culpa de la impaciencia, el enigma 

APENDICE 

El manejo de Guillermo es sencillo, aun- 
que el de su novicio se complica por limi- 
taciones: Adzo, se maneja con el cursor de 
abajo. El movimiento siempre es en línea 

para los giros deberás girar a Guillernroen 
la dirección que quieres que se mueva 

con sólo pulsar fa tecla CTRL + TAB 
aparecerá un cursor en la parte superior 
izquierda de la pantalla. Ello significa que 
el juego está detenido para cargar o grabar 

zará la grabación, con la L la carga de una 

de todas estas posibilidades. El único pro- 
blema que conlleva el programa es que tan 
sólo se puede grabar una situación en me- 
moria. Esta sólo se puede cargar cuando 

comenzaremos siempre, una vez cargada el 
bloque, en este punto del juego, aunque se 
haya grabado éste en la pane final del 



a ellas con sólo pulsar SHIFT + Fl. E 



nado de la actual partida, sii 
continuar (pulsando las cor 
teclas) por la parre grabada e 

Dedicado a PACO MENE 



Programa ■ 



■ Por Susana San José i 



LA TIERRA 



>!? REM SUSANA SAN JOSE 
'0 REM 

30 '*«*** PRESENTACION ****** 
>» OPEN"GRP: "FOR OUTPUT AS#1:KEY 
jrr 5 3CREEMC : VI 1 D" P H3T* : COLOR 12.1.1. 
SCREEN2 

100 '***»?* MENU PRINCIPAL ***** 



120 CLS: COLOR 13. i 
130 LOCATE 10. 2: PRI NT "MENU DE OP 
CIONES" ¡-LOCATE". 8: PRI NT" i . - Si tu 
i on ": LOCATE?. 10: PP.INT"2. - E=tr 
:ura":L0CATE7. 12: PRI NT "3.- Pro 
sos qfüoloqicos" 

9 LÜCATE10,20:PRINT"ELIGE OPCI 
3 I t= INKEYf 

3 IF 1*="" THEN 150 ELSEBEEF 
;1 u- i*="i" THENGOTO220 ELSE B 



240 COLOR 2. 1. 

260 PAINT(X.Y! 
270 CIRCLE(X.^ 
280 CIRCLEU.'! 
290 CIRCLE<X,1 
300 CIRCLE(X. i 
310 CIRCLEU.' 
720 CIRCLE<X,> 
330 CIRCLEÍX.' 
340 CIRCLEÍX.' 



Un divetido programa educa 
sobre los procesos geológico 
la Tierra. El programa conti 
siete menús y quince pantalla 
gráficos más textos. 




380 CIRCLEU- 
390 PAINTCX- 
401) L!RCLE!X 
410 PATNT (X- 



540 CIRCLE( 



i CIRCLE(X-239, Y) ,2, 15 
) PAINT<X-239, Y: 
1 '****« NOMBRE PLANETAS 1 



600 PSET'.?0.' 1 



^Pro¡ 



Programa ■ 



SOLAR"! PSET <lí 
Jton"iPSET<64.<; 
ío": PSET (130. 11 



,20 LINE (232. 100) - 
(120,40) : PRINTttl . 1 
'9. 100) - (170, 160) . t 
160) :PRINT#1. 1 
COLOR 2: LINE (2- 



I I 4 



1 : LINE (24B. l! 



¡INT#1. "Sol " : COLOR ¡ 



i ESTRUCTURA TIERRA *** 



i": COLOR B: PSET ¡135. 1313; :, PRINT 
#1, "BMuclso interno" 
800 COLOR 1 3 : PSET ( 1 0 .10): PR I NT# 1 
, "ESTRUCTURA DE LA TIERRA" : PSET ( 
50, 1B3)I.PRINT#1, "Pulsa una tecla 

810-I*=INKEY* 



B50 CLS: COLOR 8.1.1: SCREEN0 
160 L0CATE2. 10: PRINT" 1 . - CADA UN 
I DE LAS CAPAS" : L0CATE2, 13: PRINT 
'2.- VOLVER AL MENU PRINCIPAL" 
B70 I*=INKEY* 

I if I*=""THEN 870 
B90 IF I*="1"THEN 50T0 920 
I IF I*="2"THEN GOTO 100 
\l? I*O"l"0R I* <>"2"THENG0TO 

920 CLS:SCREEN1 

930 LOCATE 2.0: PRINT "CADA UNA I 

LAS CAPAS" 
940 LOCATE 3,6: PRINT" 1 . - La Atrr 
s-Fera" 



-IFCLE '-(■. B> . !!•". 7. i?. RA: DRflW't 

. -k>L C" IF-B0 " : RA I NT ( X . El ) . 7: CIRC 
A . B ) . 65 . 5 . 0 . R A : DRAW " BM25 . 85D6 
5"«PAIN1 CX.Bl) ,5:CIRCLE(A.B> . 
1 0 . 0 . RA : DRAW " BÍ-125 . 90D60R60 " : P 

7*0 CIRCLE(A.B) , 55. 3. 0. RA: DRAl 

,9ED55R55":PAINT(X,B1> ,3:CIRC 
A.B) .40. 12.0.RA:DRAW"BM25. 1 1É 
R40":PAINT(X.B1) . 12 
750 CIRCLE(A.B) , 25. 9, 0. RA: DRAW'E 
•25. 125D25R25":PAINT'.X.B1) ,9:CIR 
:LE(A,B) . 10.!3.0.RA:DRAW"BM25. 140 
)Ii:iF:10":PAINT<>:.Bl) .8 
'60 NEXT X 
'70 '* NOMBRES ESTRUCTURA TIERRA 

'80 CÜLÜR /:P3ET(135.70):PRINT#1 
"■Atmosfera" : COLOR 5: PSET (135. 

D :RRINT*H . "Hidraasíera": COLOR 
0:PSET (1 35.90 ).: PRINT» 1, "«Corte 

t": COLOR 2: PSET (155, 100) :RRINT#1 



790 COLOR 1 2: PSET < 1 35. 1 10) : PRINT 
#l."»1anto inferior":COLOR 9:PSE 
Td35. 120) :PPINT#1. "BMucleo exte 



9B0 LOCA1 
al mentí 
990 LOCA! 



,14:PRINT"5.- Volver 
21 SPRINT "ELI GE OPCI 



- T HEÍ!1:;'00ELSE BEEP 

. "THEN GOTO 1080ELSE 

¡"THEN COTO1400ELSE 
¡"THEN GOTO1610EL3E 



< CAPAS ATMOSf 



!. 13) . 15: LINE 



-:150.15>.15:LINE<30.15>-(150.10 
0) . 4, BF: LIME t ' :>. 103) - < 150, 150) .5 
. BF: L INE (33. 15'?.' - 1 153. 1-0) . 7. BF 
1 153 LINE ' 50, ! 50 > - (153, 175), 14, B 
F: LINE (30, 175 ; - (153. i £3) . 15.BF:L 
INE (33. 183' - ' 153. 185) . 1 , BF" 
1130 DRAWBM33. 178C8R2F1R5F1E2R5 
E3F3E1F1P5F4F1E1F1E1F 1E1F1R1F1E1 
R1E1F1R1E1F1E1F1E1F1E1F1E1F1E1F1 
E1F1E1F1E1F1E1F1E1F1E1F1E1F1E1F1 
E1F1E1F1R2F1E2F1E1E1F1E1F2R1E1F1 
ElFlE2RlEJ.r2ElFlElFlElFlElFlR3El 
F1R2E1F1D5L1 1BU9" :PAINT ( 100, 134) 
i 8 

1140 '*** NOMBRE: CAPAS ATMOSFERA 
*** 

1150 COLOR 1:PSET(50.50):PRINT#1 
. "EXOSFERA":FSE7 (50, 125) : F'RINTttl 
. "IONOSFERA" 

1160 F'BET (50, 160) : F'RINTttl. "EBTRA 
TOSFERA":PSET(50, 170) : F'RINTttl, "T 
ROF'DSFERA " : F'SET ( 53 , 180) : F'RINTttl, 
"BIOSFERA" , 

1170 COLOR 15:PSET<6,2) :PRINTttlv 
"Km":PSET(l, 15) : PRINTttl . "2533" : F 
SET<B,95):PRINT#I . "533" : PSET < 10, 
150 ) : F'RINTttl , "80" : F'SET (10, 170) : P 
RINTttl, " 20" : PSET (10, 180) :PRINT# 

1 1 B0 COLOR 1 5 : PSET ( 35 , 0 ) : F'RINTttl 
. " LA ATMOSFERA" 

1 190 F'SET ( 160, 2) : F'RINTttl , "Era. " : 
PSET (155, 90) :PRINTttl. " 2000° C" : PS 
ET(155, 115) : F'RINTttl , "740» C" : PSET 
(155, 145) : F'RINTttl , "-63°C" : F'SET ( 1 
55, 170) : PRINTtt 1 , "-55° C " : F'SET ( 155 
, 180) : F'RINTttl , "15°C" 
1233 PSET (225. 33) : F'RINTttl , "p": PS 
ET'225.40! : F'R I NTtt 1 , "u " : F'SET ( 225 , 
50) : F'RINTttl , "1 " : F'SET (225, 60) : PRI 
NT#1. "s":PSE r 1225. -!?'■ : F'RINTttl , •■ á 
": PSET (225, 90) : F'RINTttl, "u" 
1210 PSET ( 225 , 1 00 ) : F'R I NTtt 1 , " n " : P 
SET(225. 110) : F'RINTttl, "a" : F'SET (22 
5, 130) : F'RINTttl , " t " : PSET (225 , 140) 
: F'RINTttl, "e" : F'SET (225, 150) :PRINT 

1220 PSET (225, 160) : F'RINTttl , "1 " : P 

SET (225, 170) : F'RINTttl , "a" 

1230 I*=INKEY* 

1240 IF I*=""THEN1230 

1253 '***«* COMPOSICION AIRE *** 



1270 CLS:SCREEN2 

12B0 LINE (10. 165) -(213, 165) . 12 
1290 LINE(25.73)-(57, 165) ,2.BF:L 
INE (57, 73) - (73, 85) . 12: LINE (73. B5 
)-(73. 165) , 12:LINE<73, 165)-(57, 1 




65) , 12: LINE (57, 165) -(57.73) , 12: P 
AINT(65,B5) , 12 

1333 LINE (77, 139) - ( 110, 165) . 2.BF 
:LINE(110, 139)-(125, 153) . 12: LINE 
(125, 150) -(125, 165) , 12:LINE(125. 

-(110. 165) . 12: LINE (113, 165)- 
(113, 139) , 12: PAINT ( 123. 153; , ! 2 
1310 LINE ( 139. 163) - ( 163, 165) , 2, B 
-:LINEM83, 1641- ,205, ! 65 > , 2.BF 
1323 COLOR 4 : F'SET (5, 3) : F'RINTttl , " 
COMPOSICION DE AIRE (TROPOSFERA) 

COLOR 12: F'SET (10,9) : F'RINTttl 



; oxigenados de nitrógeno, hidru 
- ros, materias orgánicas y bac 



170) : F'RINTttl , 1 



:T(185, 170) : F'RINTttl , J 'C0 2 " 
1 350 CÜLDR 1 5 : FSE I ( 35 , 120) : PP I NT 
ttl. "-87." : F'SET (85, 155) : F'RINTttl . "2 
IX": COLOR 12sPSETU35, 155) : F'R I NT 

3 ■ 937. " : F'SET (180, 155) : F'R I NTtt 1 

03%" 

) COLOR 8: PSET (53. 185): PRI NTtt 
>ulsa una tecla" 
J I*=INKEY* 
< IF I*-~-""THEN1370 
i GOTO 920 

) ' ****** LA CORTEZA 



1423 CL3:SCREEN2 
431? LINE (13. 38' -(103. 163) , 15. BF 
:LINE(100,8ü>-< !.20, s r,n , í4iL1ME< 
120.60)- (123. 123) , 14: LIME ( 1 23 . 1 2 
0)-(103, 163) , 14:LINE(100, 160) --(1 
3; . 14:PAINT(U0, 1.00) . 14 



Programa ■ 



1440 DP AW " BM45 , 60C 1 2R9F ! R9F 1 R9E 1 
R 1 !?E 1 R 1 5F 1 R 1 F 1 RSE i R6E 1 R TQ 1 2D 1 L- 1 D 
1 Gl DÍ L2G4D 1 L 1 6 1 D !. 6 1 D 1 G 1 E)4LlGlLlh 
1L7G1L13H3L°G1L1H1L1 1G1L7H1L15HÍ 
L9G2L3E5F:¡ UJ EiF i F ! E3U 1 E3U i E4R 1 U : 



E4R11 



14 60 



1E.F 



120)- (94. 160) . B; BF 
147'? LIMEIS, 120)-(120.75) ,6:LIM 
T< 120. 75) -(120, 120) .6:LINE<120, 1 
>0>-(95, 165) ,Ó:LINE(95. 165)-(9S, 
20) -6:PAINT<110. 125) .6 
.480. DRAWBM10, 1 15C5E5R1F4R1 E6R2 
:7F 7R2F 1 E5R 1 F5R2E6R 1 F7R 1 E3R 1 F5R3 
E5F6E3F3D30HcL2M357L2H;'G4l 2H3G'IH 
566H7L2G5L3H3ei L2G3L 1H7L1 G2U30» s 
P AI NT (20. 120) .5 

1 490 DRAW " BM95 . 1 1 6C5E5U3E 1 U 1 E 1 U 1 
E2U1E1U1E1U1 E2U 1E1U1E4U2E3U 1 E5D2 
0G4R1D4G7D4G3D4G4D4G7D4U20":PAIN 
T ( 1 00 , 1 25 ) , 5 

1500 "***« NOMBRE CAPAS CORTEZA 



1520 COLOR 
1530 PSET( 
EZA" : COLOR 
, "CAPA":PSET 
DI MENTARIA 
, "SIAL":PSET 
MA" 



3) :PRINT#1, "LA CORT 
PSET(40,90) :PRINT#1 
17, 100) :PRINT#1. "SE 
PSET(40, 130) :PRINT#1 
:PRINT#1 , "SI 



1540 COLOR 5:F 



5: PSET (123. 10) :PRIN" 
" CAPA COMPOS I C I ON " : PSET ( 1 30 , 

Sedimentos":PSE 
H."2t Silica 
s": PSET (160, 70) :PRINT#1, " alun 

1550 PSET<160,80> :PRINT#1. " y 



1650 COLOR 12: PSET 
. "El manto recubre 
ne un espesor de c; 



,50) • 



e casi 2900 Km y 

: PRINTHl , "Esta fe 

fusión. Estos n 
ateríales se desplazan bajo 1 
Drteza provocando en ella 1c 
smbios mas importantes" 
;l PSET (55, 175) : PRINT4U . "Fula; 



i I*=INKEY* 
! lFl* = ""TKEr!1680 
1700 GOTO 920 

' ******* EL NUCLEO ******** 



1720 • 

1730 CLS:3CREEN2 

LINEU0, 10) -(250. 30) ,4.B:C: 
=: PSET (80, 18; :PRINT#1. "EL NI 
CLEO" 

.750 COLOR 12: PSET (1*. 50) :PF.INT#. 
[ núcleo es la parte nías intí 
i. Sé compone, pr i nci pal meM 
5 níquel (Mi J v hierr 
■ ahí el nombre de Nife 



1760 FSET'J 



; d 



100) sPRINTSl, "Bu den 



T (50. 170) :PRINT#1. 



(3.20 

"Pulsa 



NT#1," magnésicos" 

1560 PSET (160. 140) :PRINT#1, " y 
ocas" : PSET (160, 150) : PRINT#1 , " 

1570 COLOR 8: PSET (55. 180) :PRINT# 
1. "Pulsa una tecla" 
1580 I*-INKEY* 
1590 IF I*=""T HEÑI 580 
1600 GOTO 920 

1610 ' ***** EL MANTO ****** 
1620 ' 

1630 CLS:SCREEN2 
1640 LINEU0, 10) -(250. 30) ,4. B: 
LOR 4 : PSET ( 80 , 18) : PR I NT# 1 , " EL 



'ROCESOS G 



í CLS:SCREEN1 
3 LOCATE" 4..2:PRINT" 
E0L06IC0S" 

i LOCATE 5.6:PRINT" 



1840 LOCATE 5, 8: PRIMT"2. - Seísmo 



1870 L0CATE5. 14: 
I*=INKEY* 



RINT"5.- Volver 



BEEP 
1940 IF ] 
BEEP 



="2"THEN GOTO 2720EL3E 
= •'3 "THEN BOTO 2950ELSE 
="4"THEN BOTO 31B0ELSE 
= "5"THEN GOTO 100ELSE 
»***» VOLCANES ****** 



F6E54F13R5E13F78R25D4BL270U48" : P 
ftINTdl. 121) ,8 

1 990 DR AW " BMB0 . 90C 1 0D30F 1 3R 1 0F 1 3 
G6D5G6D5R95H6L5U5H6L 1 0H6LJ90E 1 2F3 
0E3H35G15L3D80G6L20G3H1BL20H6U22 
L5":PAINT(125.150>,10 
2000 COLOR 4 : PSET (10, 10) : PRINT#1 
, '¡PARTES DE UN VOLCAN" : COLOR 1:P 
5ET •, J 2Z. 301 : F F INTttl. "Conc": PSET < 
170. 120) :PRINT#1. "Chl ¡Tienen '' : F SET 
U25. 155) :PRINT#1. "Foco" 
2010 COLOR 8:PSET (160.25) :PRINT# 
1 . "Cráter " : PSET (35. 60) : PRIIN i #1 , " 
Cono";PSET(25.70i :PRINT#1. "adaen 

2020 PSET (60. 180) :PRINT#1. "Pul sí 

1« tecla" 

Z0 J*=INKEY* 

«I IF' 1*="" THEM 2030 



rr:iN 



'"OP 



S": L0CATE2. 
MENU 11 : PR T N T 
CION" : N 

2060 IF N<1 OR N ';; 2 THEM 2050: ZF 
M=l THEM COTO 2070: IF H=2 THEN G 
OTO1810 

CLS: SCREEN0: L0CATE3, 1 : F'RINT 



LOCA" 



•F i '-i 



:7.6:PRINT"2. -ES 
QCATE7.8:PRINT"3.~ 
CA7E7 .10: PR IN'l "4. -PEL LAÑO " : LOCAT 

12: PRINT"5. -VOLVER AL "ENU" 
205- rr,II-M iFF.IMT: INPuT-OPCIWiO 
2090 IF 0<1 OR 0>5 THEN GOTD 7*7 



210- 



IF 0=1 THEM GOTO 2170 

IF 0=3 THEN GOTQ 2423 

IF 0 = 4 THEN BCTG 21'¡i 

2140 IF 0=5 THEN BOTO ;'pi¡? 

2160 ' 



"IFO HAWAI ANO i 



lpRINT#l, "TIPO 
ICSDlT-Pl'il^UltV'iL 



2190 SCREEM2 
2200 PSET (140. 
HAWAI AND" 
22Í0 DRAWBM10 

-(75.65) ,B:LINE(75.65 
8:PAINT(50.B0! 
2220 CIPCLE(67 
INTÍ67.65) . 10:DRAW"EM66. 65CÍ0R3D 
25L3U25" : PAINT (67. 75) . 10 
2230 PSET (10. 100) :PRINT#1. "Se ca 
racteriza por erupciones trar 



2240 COLOR 8: PSET (60. 
1, "Pulsa una tecla" 
2250 I4=INKEYS 
2260 IF 1*="" THEN 2250 
2270 BOTO 2070 
2280 ' 

2290 ' ** TIFO BTROMEOL I AMO ** 
2300 ' 

2310 SCREEN2 

2320 FSET(3.45>:PRINT#i."TIP0 ES 
TROMBQL I ANO " 

2330 DRAW "BM135. 75C3D15R1 1 0'J 15": 

LINE(135.75>--:i80.50>.B:LINE<!80 

.50) -(192. 45) .8:LINE(192.45)-'24 

5.75! -8:PAINT(!50.80).8 

2340 DRAWBM192.50C10D40L4U42L1U 

1 L5-D2L 1 D 1 L 1 D 1 L 1 D 1 L 1 D 1 L 1 D 1 L2D 1 L 1 D 

1L1U1L1U1L1F.1U1R1U1P1U1R1U1R1U1R 

1U1R1U1R1U1R1U1R1UÍR6D1R2D1F2D2R 

1D1R1D2":FAINT(180.47) . Í0:PA:NT' 

190.85) . 10 

2350 PSET (10,1 00> : PR I NTtt 1 , " De la 
va fluida, auncue menos a je en 
los del tipo hawaiano.En ellos 



la- pil 

2360 PSET (30. 157) :PRINT#1. "li. " 
2370 PSET (75. 180) : PRINT#1 . "Pulsa 

una tecla" 
2380 I*=INKEY* 
2390 IF 1*="" THEN 2380 
2400 BOTO 2070 



241É 
2420 

2430 
2440 SCREEN2 
2450 PSET (130. 1. 



TIPO VULCANIANO **'« 



:PRINT#1, "TIPO 



27 



* Programa 




:reciendo aoco a doco y 
?ndo la forma de aguja. " 
2660 PSET ( 1 0 . 60 ) : PR I NTttl 



i, 180) :PRINT#1,' 



:l I*=INKEY« 

5 IF 1*="" THEN 2680 

J SOTO 2070 

SEISMOS **« 



2740 CLStSCREEN2 
2750 LINEO. 5) - (250.20) . 4.BF 
2760 COLOR 1 1 PSET (10, 10)1 PRINT4M 
."SISMOS. SEISMOS 0 TERREMOTOS" 
2770 COLOR 4: PSET (5, 40) :PRINT#1, 
"Seísmo": COLOR 12: PSET (58, 40) : PR 
INTttl,"es una sacudida brusca de 



2780 PSET (1,70) |PRINT#1, "- Megas 
i smo, catastro* ico": PSET ! 1 . 80) : P 
RINT#1."- Macrosismo, de gran ín 
tensi dad": PSET (1.90) sPRINT#l, "- 
Microsismo. de poca intensidad" 
2790 COLOR 4iPSET(2. 110) :PRINT*tl 
. "Hipocentro":COLOR 12:PSET<88. 1 



267- :-r -iW"BM192, 105C14D3L1D1L2D1 
. ~.:' L1I2L2D1L4D2L 1D1L1D1L2D2L.4D1 
L4D1L1D1L601L1D1L1D1L7U1 L2U6 " 



p ; NT t 



2300 COLOR T: P"SET (2, 140) : 
, "Epicentro" : COLOR 12: PSET (75. 14 
0) :PRINT#1 . "es la zona de la sup 
er---ficie terrestre donde se ma 



da en la vertí Ci 

2810 COLCR BlPSI 
1 . "Pulsa una tec 
2620 It=INrEY* 
2830 IF I *="" THE 
2840 r L s : srF<-tN: 




'AINT 1 



2860 ! 
E (225, 50) 
5>-<40,85> 
) . 12iPAINT 
2870 LINE ( 
20sB»125íC 
,B) , 1 : LINE 
288(3 COLOR 
RCLE 
36) . XsCIRCLF 



:40,85> - < 190. 165) ,9, BF: 
; < - < 22=5, 50) , 3: LINE ■ 225 
■■0! .8: LINE (225. 130)- ( 
.INEÍ190. 165) -(190. 85 
• 0.85) .8 
75, 50) -(225. 50) , 12:LIN 
190.85) , 12: LINE (190. 8 
1.2:LINE(40.85)-(75,50 
100.65) . 12 

60. 85) -(185. 50! . l»ft»l 
RCLeíA.B) .7. 1:PAINT(A 



: C J 



23°!,' COLOF 1 : PSET(100. 135>:PRINT 
#1. "Hipocentro": PSET ( 130. "'5) : P r I 
NT#1, "Epicentro" ¡PSET (140, 110):P 
RINT#1, "Falla" 

29l'¡"! COLOR 4:PSET(40, 10) :PRINT#1 

, "SECCION DE UN SEISMO" 

2910 COLOR 1: PSET (45, 90) lPRINT#l 

, "Ondas" :FEET (45. 100; : PRIMTttl , "s 

ismicas":P5ET(55, 1G5) : COLOR 14: P 

RINT#1, "Fulsa u.na tecla" 

292-!? I*=INKEY* 

2930 IF 1*="" THEN 2920 

294 0 GOTO 1810 

2950 '***¥#* RIOS ******* 

2970 CLS: SCREEM2 

2930 LINE (0. 170) - (80, 165) ,5: LINE 
(80. 165) -(150, 135) , 5: LINE '150, 13 
5! -(210,95) ,5:LINE!210.95>-!256, 
45) ,5iLINE(0. 180)-(B0, 180) ,5:LIN 
E_(B0. 180) -(150. 145) ,5:LlNE(!50. 1 
INEÍ210, 105) -(2 



55) .5 
■> PAINTi 
:' LINE'2 



1 80 ) - 
150. t. 



,8:1 



3s LINE (2: 
6 , 55) , 8: PAINT ( 200 , 1 9! 
3010 LINE (80. 40) -(80 
E(180,40)-!180. 180) , 
3020 COLOR 4: PSET (50 
, "LOS RIOS" : COLOR 12; 
: F'PINT#:: . "CURCO BAJO' 
i : F R 1 NTtt 1 ., " CURSO MED I O 
.50) :PRINT#1. "CURSO Al 
3030 COLOR 5: PSET (3,1. 
. "Sedimentación 11 : PSET 
NT#l, "Transporte"! PSE' 
RINT#1, "Erosión" 
3040 COLOR 15: PSET (3. 
1 . "sedimento" : PSET (10, 
#1, "f ino":PSET(95. 163: 
arenas": PSET '115. 135) 



80) ,8:LINE 
INEÍ150, 14 
0. 105) -.(25 



PRINT#1 
PSET (5, 100) 
PSET (90, 75 
PSET (180 



75) ¡PRINTtt 
185) :PRINT 
:FRINT#1, " 
PRINT#l."p 



quede al margen te propo- 



sección Línea Directa. 

PREMIOS 

5. " MSX CLUB premiará 

aquellos programas 
publicados con 2.000 

6. " MSX CLUB se reserva 



FALLO Y 
JURADO 




3110 COLOR BsFSETO 



THEM31 



IF 



'PP, I*-"a"THENGOTO 
•OR I*="b"THENGOTO 
V OR I*O"B"THEnd0 
»."OR I*<>"b"THEN GO 



SCREEN2 

GLACIAR *** 
INE (40. 45) -(50.70) . 15:LINE 
(30, 70) -(30, 80) , 15:LINE(50,B0)-( 
53,70) , 1E:LINE(53.70)--(5B.70) , 15 
¡LINE (58. 70) -(60. 80) . 15:LINE(60, 
" ->tto . 15 
LINE<60,70)-<70,73) ,15»LINE 
3) -(100, 73) , 15:DRAW"BM100,7 
'2E3R3D2E3F3D3E3D2R2D2E2D3R4 

3220 LINE(120';'B4).-(130. 100) . 15: C 
IRCLE (123, 107) . 10. 15:PAINT(123. 1 
13» DRAWBM40, 45C15D55F90" : RA 



37-::.' !.INE(245, 130) -(256. 141) , 13: 
LINE (256. 141)-(23B. 140) . 13:LINE( 
238, 14|¡1> -'245. I30i . 13:PAINT(24B. 
13C") . 13:LINE(0. 160) -(256. 160) ,8 
32 = :: DRAWBM0.. 40C8E14F7R1D1R1.D4R 
3E7F7R1D5R1D9R1D9R2D13R2D6R:e RJ 
0D3P12D2R30U1R6D3R2D2R2D2R2D2F2I.. 
2R2D 1 3R3D 1 0R2D5R5D2R29U2R 1 0U3R 1 6 
D4R6D6R2D3R9D2R9D 1 R8D2R 1 3U 1 RBU2R 

5D1R11". 
327:3 PAINTU00, 150) ,B 
-"30 PSET (1,0) : PRINTttl , "CORTE LO 
NGITUDINAL DE UN GLACIAR" 
3290 L I NE ( 1 4 0 , 3'0 ) - ( 1 30 , 1 00 ) , B : PS 
(130,75) ¡FRINTttl, "LENGUA" 
:>0 LINE(75,70)-(75,50) ,8: PSET ( 
4b; : PRINTttl , "CIRCO" 
.0 PSETU40, 100) : PRINTttl , "Zona 
;": PSET (140, 110) : PRINTttl, "desh 

3320 LINE( 120.50) -(110, 70) ¡PSET ( 
110,45) : PRINTttl . "Seracs" : LINE (50 
, 40) -(50, 65) : PSET (50. 35) ¡PRINTttl 
, "Ri mayas " 

3330 LINE (200, 50) - < 180, 120) ¡PSET 
(185.35) ¡PRINTttl. "lecho del"¡PSE 
T (190, 45) ¡PRINTttl, "antiguo" ¡PSET 
(190.55) ¡PRINTttl. "glaciar" 
3340 LINE (240, 110) -(240. 127) ¡ PBE 
T (200. 80) ¡FRINTttl. "morrena "¡PSET 
(195,90) ¡PRINJ-ttl, "terminal "¡PSET 
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Test de listados 



l - 58 590 - 



-246 1980 - 



- 20 1030 -230 

-186 1530 -230 

- 31 1540 -185 

- 53 1550 - 75 
1070 - 52 1560 -222 



2020 
207:3 
2040 
2050 



130 -218 620 -105 

140 -125 630 -107 

150 - 72 640 -196 

160 -169 650 - 72 

170 -169 660 -159 

180 - 19 670 - 15 

190 -131 680 - 58 

200 -236 690 - 58 



■ 5B 720 -215 1210 



1240 -229 



-122 s»ig) -201 



■ 74 940 - 25 143 : " 



15 2510 -131 3000 - 

72 2520 - 30 3010 - 

8 2530 - 72 3020 - 

=0 2540 -244 3030 - 



3050 - 37 



1590 - 69 20E 

1 600 - 50 2090 - 



2100 -206 



- 5 0 2190 -216 : 



2210 
2220 
2270 



2280 
2290 
2300 



2390 
2400 
2410 



35 2690 - 

-212 2700 - 

-163 2710 - 

-163 2720 - 



181 3190 - 

58 '3200 - 

58 3210 - 

53 3220 - 



- 58 2770 -154 

- 5B 2786! -235 

- 58 2790 -169 
-216 2800 - 43 

- 25 2810 - 31 
-255 2820 - 72 

- 68 2B30 - 7'4 
-237 2840 -177 
-139 2850 

- 30 2860 

- 72 2870 
-104 2880 
-181 2890 



3250 - 
3260 - 
3270 - 



-230 3350 - 

• 197 3360 - 

• 197 3370 - 
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Programa ■ 



■Por Nivolas Wadham Lasarte ■ 



SOLFEGGIETTO 



Solfeggietto es una excelente 
partitura musical sobre un tema 
de Cari Phillipp Emanuel Bach. 



REM NICOLAS WADHAM LASAR T E 
. REM 

BS A*=IN> EY*: IFA*< •• "THENSl» 
? CLStKEY OFF 

yy, PMNT-PUL3A CUALQUIER TECLA 

EMPEZAR" 
10 A*-INKEY*| IFA*=" "THEN1 10 
2:: ! EY 0Fr:C0L0R7.1, .:SCREEM0 

i ! TO T::h«-A»+CHF»<C 
5 ) : !ME >í T I 



« MIGOLAS WADHAM LASARTE 



)a PLflv "04e-16el&03g].6*-\ 
rl604gl6e-l£a-l£>02f ' ' 
i-1604cl6e-16" 




523 PL •'■ ■ 040160Sb-l( 
604b -16Í 16dlia:6C2e-: 
-16<5l6b-16D4cU6" 

340 PLAY "D4clí>03aióc 
Q 3a 16a ►16¿,:604s-l£¡=:¿ 
-16ci60Sgí6«Í6" 



SC2c-l¿al£" 
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JOYSTICK EN MANO . 



■por Carlos Mesa» 



ESPECIAL 
VIDEOjUEGOS 



o apartado, dedicado en una pri- 
íera ocasión, a los amantes de los 
ideojuegos. En esta sección el lec- 
)r es el principal protagonista. 



Una nueva sección pretende acapa- 
rar la atención de los lectores: 
JOYSTICK EN MANO. El hecho 
de que se defina así, intenta explicar, bajo 
una metáfora, las tediosas horas que mu- 



ñíalo que, por consiguiente, pretendemos 
que a partir de ahora todas las cartas de 
es,., índole, llegadas ., la redacción, sea,, 
publicadas junto con el nombre del lector. 

de ellas. Por 



ROGER PONS CASANOVAS 



NEMESIS 

Todas las arma: 



Nada más empezar el juego, pulsar F¡ 
■ escribir HYPER, pulsar RETURN y 
'olver a pulsar F¡. Gmseguiremos todas las 
irmas. Esta misma operación se puede 

,P el HYPER por la 



PEDRO MARQUEZ JIMENEZ 



POKES DE VIDAS 
INFINITAS 




Poke B833.X (donde X es el número de 



Dirección de ejecución: B575 
2 — Clapton U. 

Poke A069,X (donde X es el nú 
vidas). 



Poke C066\X (donde X es el n, 
«fas). 

Poke C1ED.0 (vidas infinitas). 
Dirección de ejecución: C000 
Con los pokes y direcciones de ejecución 
¡e pueden montar pequeños ca 
Para las vidas infinitas, sólo 



SORCERY 



iKM23,tHtl 
50 fl'lHcia» 

a ftm tijf Miwf THE k : <i 

78 POKE MíMWíMTO 60 

i:' tl'.e, MV.wr.WtS.tWf.WJE.tW», 

MT.U-aí.Wií» 

»f D£FL , sP:P! = «<KB9ftíiA-USR!BI 



BATTLE SHIP 
CLAPTON 



20 BLOAD'CAS: " 
30 POKE mwi.i 
40 DEFUSR=4HftBÍ0:A= 



NEMESIS 



En el nivel tres, al llegar a las hileras 
caras, nos colocamos en la parte de arriba. 
Cuando lleguemos a dos caras que es 
enfrentadas por el cogote, nos colocar 
en el centro, y le disparamos a la altura 
la boca, rápida y seguidamente. En el mo- 
mento en que abra la boca el jueg 
parará, y, nuestra nave saldrá disparada 
hacia delante sin que ésta se destruya con 
nada. Pero... no seremos transportados a 

zona (a la que ignoro si se puede llegar de 

valen una estrella y que se encuentra pla- 
gada de piedras como las del segundo 



Aquí podremos usar el truco de las 
mas (HYPER), aunque lo hayamos us 
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Video-Pokes 



por Miguel Angel Vila 



MARTIANOIDS 



lave espacial. Los peligros y ene- 
in innumerables y nada fáciles de 
ir. Para que salgáis invictos de esta 



10 ' CARGADOR - MARTIANOIDS 

21 ' PARA VIDAS INFINITAS 

31 ' PARA INMUNIDAD TOTAL 

41 ' POR MIGUEL A. VILA 

Sí ' PARA HSX-CCUB 



71 COLOR 13, 1, tlSCREEN P 
81 FOR I=iHE500 TO 4HE511:READ M 
90 POKE I,VALCIH'»A») 
¡88 NEXT I 



118 LO 



E 5,18 



12Í PRINT'CAR&ANDO - MARTIANOIDS' 

130 BLOAD'CAS;' 

140 POKE WE8DE.WE5 

150 DEFUSR=IHE008:A=USR(8> 

lie DATA 3E,8,32,4A,A3,3E,0,32,4D,9t,3 

E.0,32,ED,93.C3,0.4B 



RADX-8 



ste juego es exclusivamente paa la 
w4 segunda generación en la versión de 
M J disco. Nuestra publicación es proba- 
blemente la primera en sacar un cargador 
para un juego de tales características. Al 

drar bien la pantalla con los cursores, apro- 
vechando de este mo J " '~ 
los MSX-2. Debemos 
RADX-8 por cantid 



e 300 misiles. Podren 
poner de todos ellos cada vez que en 
en un nuevo nivel. Obtendremos ur 
talla BONUS cada vez que paser 
nivel, siempre que nuestra puntuac 



ñera Debemos poner el número de vidas 
(1-255) en el POKE indicado (por medio 
de un REM) y poner el número de nivel 
de comienzo (1-99) también en su POKE 



correspondiente. Copiad el siguiente ca 
dor, recordad que es para la versiói 
disco y disfrutad jugando en los 99 nii 
de este juego. 

18 ' RA0X-B 

38 ' NI6UEL VILA 

S8 POKE 1HF4C3,4H?8:RUN48 

48 SCREEN8: COLOR 8,8,8 

78 BLOAD'TITLE.PICS 

88 SET PA6E 8,1 

118 BLOAD"sprites',S 
118 SET PA6E 8,8 
128 P0KEiH4C5.iH9e:RUN138 
138 BLOAB'radx.eie' 
148 POKE IHC1BB.4'VIDAS 
158 POKE UClFS.l'LEVa 



141 !> 



FEUD 




50 CLEAR 108.1HB7FF 

40 X=iH9880;Y=iH9500 

78 KEYOFF: COLOR 15,1.1:CLS:L0CATÍ 

8:PRINT "FEUD is loading ..'¡KM 

80 BLOAD 'cas;' 

98 BLOAD 'cas:' 

108 POKE X*21BB,K:P0KE V90B.0 
118 POKE Y-943,K:P0KE X*337,0 
120 POKE X+337+l.B 
130 POKE X*337*2,0 
140 POKE X»IH154,K 
150 POKE V-ÍH3AC.0 
140 POKE Y-948+1,8 
178 POKE V-iH3flC+2,« 



THING BOUNCES 
BACK 

El sueño de todos los pequeños es 
aparecer dentro de una juguetería. 
Thing Bounces Back os permitirá 
hacer realidad este divertido sueño, al m 
nos ante las pantallas de vuestros MSX. 

Pero para que podáis disfrutar al má> 
mo de vuestra estancia en tan agradable 

vidas infinitas. Allá vosotros si desap 



18 ' CAR6AD0R - THING BOUNCES BACK 
28 ' POR MIGUEL A. VILA 
38 ' PARA NSX-CLUB 

4e ' — 

58 COLOR 15,1,1;CLS:KE¥ OFF 

48 LOCATE 5,18:PRINT"CARGAND0 - THING 

BOUNCES BACK' 

70 BLOAD'CAS:' 

B0 POKE 1HD829,0:POKE &HDB2A. S.HD9 : POKE 
IHD931,0 

90 FOR I=iHD900 TO ÍHD90D 
líe REÍD A$ 

118 C=VAL('liH'*A$):POKE I.C:N=N+C 
128 NEXT I 

138 IF N01754 THEN CLS:BEEP :PR!NT:PR 

'RINT'ERROR EN DATAS" 
14B DEFUSR=iHDB00:A=USR(0) 
158 DATA E5.21,8,0.22.CE,B1,22,E9,95,E 
l,E9,C9,e,0,e 



